Programming Microsoft Visual Basic .NET/Programming Microsoft Visual Basic .NET (Microsoft Press)(X08-78517)(2002).bin/setup/vbnet/03 control flow and error handling/controlflowdemo/optionstrictoff.vb

Text File | 2002-03-16 | 391 b | 17 lines

' this file gathers a few code samples that require Option Strict Off
Option Strict Off

Module OptionStrictOff

    ' this procedure tests passing a ByRef argument a value of a different type

    Sub TestCallByRef()
        Dim intValue As Integer
        Call MyProc(intValue)
    End Sub

    Sub MyProc(ByRef lngArg As Long)
        lngArg = 9999
    End Sub
End Module